home *** CD-ROM | disk | FTP | other *** search
/ Atari Mega Archive 1 / Atari Mega Archive - Volume 1.iso / gnu / fpu881 / src6.zoo / _mulsf3.s < prev    next >
Text File  |  1991-09-24  |  641b  |  34 lines
  1. # single precision floating point stuff for Atari-gcc using the SFP004
  2. # developed with gas
  3. #
  4. # single floating point multiplication routine
  5. #
  6. # M. Ritzert (mjr at dfg.dbp.de)
  7. #
  8. # 7. Juli 1989
  9. #
  10. # revision 1.1: adapted to the gcc lib patchlevel 58
  11. # 4.10.90
  12.  
  13. comm =     -6
  14. resp =    -16
  15. zahl =      0
  16.  
  17.     .text
  18.     .even
  19.     .globl    __mulsf3, ___mulsf3
  20.  
  21. __mulsf3:
  22. ___mulsf3:
  23.     lea    0xfffa50,a0
  24.     movew    #0x4400,a0@(comm)    | load first argument to fp0
  25.     cmpiw    #0x8900,a0@(resp)    | check
  26.     movel    a7@(4),a0@
  27.     movew    #0x4427,a0@(comm)
  28.     .long    0x0c688900, 0xfff067f8
  29.     movel    a7@(8),a0@
  30.     movew    #0x6400,a0@(comm)    | result to d0
  31.     .long    0x0c688900, 0xfff067f8
  32.     movel    a0@,d0
  33.     rts
  34.